home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 10 / FM Towns Free Software Collection 10.iso / fb386 / tool / mondu / exist.bas next >
BASIC Source File  |  1995-02-07  |  240b  |  5 lines
  1. 10 CLEAR ,,,,10000
  2. 20 LOADM "BAS_LIB.REX",0
  3. 110 FILENAME$="EXIST.BAS"
  4. 120 IF CALLM(0,0,VARPTR(FILENAME$),VARPTR(FIND$),0,0)=0 THEN PRINT FILENAME$;"というファイルは既に存在します。" ELSE PRINT FILENAME$;"というファイルは存在しません。"
  5.